﻿Imports System.Data.OleDb

Public Class Registro
    'Declaramos variable para conexión
    Dim ConeccionP As New OleDbConnection
    'Declaramos variable de Comandos Sql
    Dim ComandosSqlP As New OleDbCommand
    'Declaramos variable para lectura de datos
    Dim Lectura_datosP As OleDbDataReader

    Public Sub New(ByVal Coneccion As OleDbConnection, ByVal ComandosSql As OleDbCommand, ByVal Lectura_datos As OleDbDataReader)

        ' Llamada necesaria para el Diseñador de Windows Forms.
        InitializeComponent()
        ConeccionP = Coneccion
        ComandosSqlP = ComandosSql
        Lectura_datosP = Lectura_datos
    End Sub
    Private Sub btnAceptar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAceptar.Click

        Me.Dispose()

    End Sub

    Private Sub btnLimpiar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnLimpiar.Click
        txtNombre.Text = ""
        txtAPaterno.Text = ""
        txtAMaterno.Text = ""
        txtDireccion.Text = ""
        txtDNI.Text = ""
        txtTelefono.Text = ""

    End Sub

    Private Sub btnCancelar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnCancelar.Click
        Me.Dispose()
    End Sub
End Class